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- NEW APPROACHES TO THE AP-120B 
I. HIGHER LEVEL LANGUAGES FOR THE AP=120B 
1. What language? (Is Fortran immortal?) Some choices: 


A. Scalar (Standard) Fortran, vectorized automatically | 


Questions: 
i. How much does the user have to modify his code to make it 
vectorizeable? 


ii. Who splits the code between the host computer and the AP, 
the user, or the vectorizer? | 
iii. Does the vectorizer run on a large computer, or a mini? 


2. Scalar Fortran ve Vector calls (like the VFC) 

3. Fortran with vector syntax added, i.e. ability to declare vectors 
and operate on them. PL/1 allows this. Some possibilities 
A(1,*)=B(1,*)+C(1,*) add the first column of two matrices 
A=A+10.0 add 10.0 to all the elements of A 


4. Other scalar languages (ALGOL, etc) 
5. A vector language such as APL. 
6. Optimization, how soe! 


2. How does the’ higher level ieneutee: affect the AP-120B - Host 
relationship? 


II. THE AP-120B/HOST COMPUTER DUAL PROCESSOR | 


l. The current approach: the AP-120B as tightly controlled slave of the 
host computer. 
2. A “virtual channel” to lessen operating system overhead. 
3. The Vector Function Chainer: moving the CALLS from the host to. the AP-120B. 
4. Who is master? or how to coordinate host I/O with AP-120B computation. 


Page 


ee ee 
rrr OO ONO & DN 
Nr © 


APPENDIX B 


Name 


INDEX OF ROUTINES IN PAGE ORDER 


Operation 


Typical 
Execution 
Time/Loop 

(us) 


167 | 333 


Program 
Size 
(AP120B 

PS words) 


. APWAIT 
APGSP 
APCHK 
APSTAT 


PUT DATA INTO THE AP1L20B 


GET DATA FROM THE AP120B 


-. INITIALIZE THE AP120B 


WAIT FOR AP120B DATA TRANSFER 

WAIT FOR AP120B PROGRAM EXECUTION 
WAIT FOR AP120B 

READ AN AP120B S-PAD REGISTER 
CHECK AP120B PROGRAM ERROR CONDITION 
GET AP120B HARDWARE STATUS 


tet 
Het Hed 
Ht Hed 


20000 CCOCO 
Soooo0oo so 


VSADD 
VSMUL 
VSQ 
vssa 
VABS ° 
VSQRT 
VLOG 
VLN 
VALOG 
VE XP 
VSIN 
VCos 
VATAN 
VATN2 
VRAND 
VMA 


VECTOR 


VECTOR - 


VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 
VECTOR 


VECTOR 
' VECTOR 


VECTOR 
VECTOR 
VECTOR 


VECTOR 


VECTOR 
VECTOR 
VECTOR 
VECTOR 


RAMP 
NEGATE. 


ADD 


SUBTRACT 
MULTIPLY 
DIVIDE 
SCALAR ADD 


“SCALAR MULTIPLY 


SQUARE 

SIGNED SQUARE 
ABSOLUTE VALUE 
SQUARE ROOT 
LOGARITHHN (BASE 10) 
NATURAL LOGARITHM 


ANTILOGARITHM (BASE 10) 


EXPONENTIAL 
SINE 
COSINE 


 ARCTANGENT. 


ARCTANGENT OF Y/X 


‘RANDOM NUMBERS. 


MULTIPLY AND ADD - 
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14 6 
14 12 
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12 12 
Ly 7 
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17 10 
17 LZ 
75 75 
16 8 
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14 7 
79 79 
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39 39 
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46 46 
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89 89 
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EXTRACT REALS OF COMPLEX VECTOR 


Typical Program 
Execution Size 
Page Name Operation Time/Loop (AP120B 
(us) PS words) 
167 | 333 167 | 333 
D-41 VAM VECTOR ADD AND MULTIPLY bez 1.8. 20 15 
_ D-42 VSMSA VECTOR SCALAR MULTIPLY AND SCALAR ADD 0.5 0.8 22 15 
D-43 VMMA VECTOR MULTIPLY, MULTIPLY, AND ADD Ls3 Zed 24 20 
- D-45 VAAM VECTOR ADD, ADD, AND MULTIPLY | Is 2.3 18 20 
D-47  VAND VECTOR LOGICAL AND Oi hes 17 8 
D-48 VEQV VECTOR LOGICAL EQUI VALENCE 0.8 | ae 17 8 
D-49 VOR -VECTOR LOGICAL OR 0.8 bad 17 8 
D-50 VFRAC. VECTOR TRUNCATE TO FRACTION Oa 7 0.3 {3° 13 
D-51 VINT VECTOR TRUNCATE TO INTEGER | 0.5 0.8 14 14 
D=-52 VINDEX VECTOR INDEX 0.8 1.3 25 23 
VECTOR-TO-SCALAR OPERATIONS 
D-54 SVE SUM OF VECTOR ELEMENTS 0.3 0.3 7 7 
D=-55 SVEMG SUM OF VECTOR ELEMENT MAGNITUDES 0.3 0.3 10 10 
D~-56 SVESQ SUM OF VECTOR ELEMENT SQUARES 0.3 O03 10 10 
D-57 SVS .. SUM OF VECTOR SIGNED SQUARES 0.3 O«3 EL 11 
D-58 DOTPR DOT PRODUCT 052 0.8 19 10 
D-59 MAXV MAXIMUM ELEMENT IN VECTOR 0.3 0.3 19 19 
D-60 - MINV MINIMUM ELEMENT IN VECTOR Os3 053 19 19 
D-6l MAXMGV MAXIMUM MAGNITUDE ELEMENT IN VECTOR 0.43 0.3 19 19 
D-~62 MINMGV MINIMUM MAGNITUDE ELEMENT IN VECTOR O53 0.3 19 19 
‘D-63 . MEANV MEAN VALUE OF VECTOR ELEMENTS 0.3 0.3 45 45 
D-64 MEAMGV MEAN OF VECTOR ELEMENT MAGNITUDES . 0.3 0.3 48 48 
D-65 MEASQV MEAN OF VECTOR ELEMENT SQUARES _ Je 3 0.3 48 48 
‘D-66 RMSQV ROOT-MEAN-SQUARE OF VECTOR ELEMENTS 0.3 0.3 77 77 
VECTOR COMPARISON OPERATIONS 
D-68 VMAX VECTOR MAXIMUM 0.8 1.3 19 14 
D-69 VMIN VECTOR MINIMUM 0.8 1.3 19 14 
D-70 VMAXMG VECTOR MAXIMUM MAGNITUDE 1.0 1.3 14 14 
D-71. VMINMG VECTOR MINIMUM MAGNITUDE Lal 1.3 14 14 
D-72 VCLIP VECTOR CLIP 0.5 0.8 16 16 
D-73 VLIM VECTOR LIMIT 0.5 0.8 14 14 
COMPLEX VECTOR ARITHMETIC 
D-75 CVMOV COMPLEX VECTOR MOVE 0.8 L.3 9 9 
. D-76 CVFILL COMPLEX VECTOR FILL 045 0.7 8 8 
D=77 CVCOMB COMPLEX VECTOR COMBINE Led | a 10 LO 
D-~78 CVREAL FORM COMPLEX VECTOR OF REALS 0.8 lez 9 9 
D-79 0.5 0.8 15 7 


FMMM 


Typical Program 

. Execution Size — 

Page Name Operation Time/Loop (AP120B 
(us) PS words) 
167 | 333 167 | 333 

D-80 VIMAG EXTRACT IMAGINARIES OF COMPLEX VECTOR 0.5 0.8 16 8 
D-81 CVNEG COMPLEX VECTOR NEGATE 0.8 Led 11 11 
‘D-82 CVCONJ COMPLEX VECTOR CONJUGATE eZ ba 12 12 
D-83 CVADD COMPLEX VECTOR ADD 1.0. Zaid -13 i2 
D-84  CVSUB COMPLEX VECTOR SUBTRACT 10° 240 13. 12 
D-85 CVMUL COMPLEX VECTOR MULTIPLY Ls 260 25 26 
D-87. CVSMUL: COMPLEX VECTOR SCALAR MULTIPLY - 0.8 1.3 ll ll 
D-88 CVRCIP COMPLEX VECTOR RECIPROCAL ho. 2 50 50 
D-89 CRVADD COMPLEX AND REAL VECTOR ADD ~1.3 1.8 14 14 
D-90 CRVSUB COMPLEX AND REAL VECTOR SUBTRACT 1.3 1.3 14 14 
D-91 CRVMUL COMPLEX AND REAL VECTOR MULTIPLY [33 1.8 14 14 
D-92  CRVDIV COMPLEX AND REAL VECTOR DIVIDE 30e5. es 92 92 
D-93 CVMA COMPLEX VECTOR MULTIPLY AND ADD TE | hal 30° 330 
D-95 CVMAGS COMPLEX VECTOR MAGNITUDE SQUARED 0.7 bez 13 18 
D-96 SCJMA SELF-CONJUGATE MULTIPLY AND ADD Lao ie L5 L5 
D-97 POLAR RECTANGULAR TO POLAR CONVERS ION 19.5: 195/35 119 119 
D-98 RECT POLAR TO RECTANGULAR CONVERS ION So LOe? LOw7 46 46 
D=-99 CDOTPR COMPLEX DOT PRODUCT 0.7 be 3 15 16 
DATA FORMATING OPERATIONS 
D-1Ol VFLT VECTOR INTEGER FLOAT 0.7 0.8 ll imi 
D-102 VFIX VECTOR INTEGER FIX 03-7 0.8 15 7 
D-104 VSCALE VECTOR SCALE (POWER 2) AND FIX 0.7 0.8 iz 12 
D-106 VSCSCL VECTOR SCAN, SCALE (POWER 2) AND FIX 1.5 bed 19 19 
D-108 VSHFX VECTOR SHIFT AND FIX O57 0.8 9 9 
D-109 - VUP8 VECTOR 8-BIT BYTE UNPACK 0.5 0.5 61 61 
D-110 VUPS8 VECTOR 8-BIT SIGNED BYTE UNPACK 0.9 0.9 69 69 
D-l111 VPK8 VECTOR 8=-BIT BYTE PACK 0.9 0.9 62 62 
D-112  VUP16 VECTOR 16-BIT BYTE UNPACK 0.8 0.8 49 49 
D-113  VUPS16 VECTOR 16-BIT SIGNED BYTE UNPACK 1.3 1.3 61 61 
D-114 VPK16 VECTOR 16-BIT BYTE PACK 0.8 0.8 40 40 
D-115 VFLT32 VECTOR 32~-BIT INTECER FLOAT bay bey 61 61 
~D-116 VFIX32 VECTOR 32-BIT INTEGER FIX L.2 Ls2 35 2 5 
MATRIX OPERATIONS 
D-1L18 MTRANS MATRIX TRANSPOSE 0.5 0.9 18 17 
D-119 MMUL. MATRIX MULTIPLY 0.62* 0.83 59 59 
D-121 MMUL32 MATRIX MULTIPLY (DIMENSION <=32) 90.50* 0.73 27 27 
D-123  MATINV MATRIX INVERSE Leb: FS Dk 160 160 
D-125 MVML3 MATRIX VECTOR MULTIPLY (3X3) Za0o Read 30 30 
D-127 MVML4 MATRIX VECTOR MULTIPLY (4X4) Je F368 39 39 
D-129 CTRN3 3- DIMENSION COORDINATE Tyrone ON: Dec SS 2 37 37 
FAST MEMORY MATRIX MULTIPLY 0.43% 61 
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D=~133 


D-148 
D=-150 
~D=-151 


D-153. 


D-154 
D-155 
D=156 


D=-159 
D-160 


D-162. 


D-163 
D-164 
D-165 
D-166 
D-167 
D-168 


D-169° 


D=171 
D-173 
D-175 
D=177 


-D-180 


Typical 


Program 
. Execution Size 
Name Operation Time/Loop (AP120B 
(us) PS words) 
167 | 333 167 | 333 
FMMM32 FAST MEMORY MATRIX MULTIPLY. (<=32) O.41* 33 
FFT OPERATIONS 
$s i ws Ss ae sh el Ge Goi Ge tec i le wt Sa na se comb ii Ss eb Su snc ee ni esti cr Susu asi em usally mimic ch cs‘ exci cn ‘amie sm si ms enh mh 
CFFT COMPLEX TO COMPLEX FFT (IN PLACE) 0.28 0.40 191 189 
CFFTB COMPLEX TO COMPLEX FFT (NOT IN PLACE) 0.20* 0.28 248 246 
RFFT REAL TO COMPLEX FFT (IN PLACE) 0.18* 0.27 260 258 
RFFTB REAL TO COMPLEX FFT (NOT IN PLACE) 0.14* 0.20 316 314 
CFFTSC COMPLEX FFT SCALE 0.8 * 1.3 42 42 
RFFTSC REAL FFT SCALE AND FORMAT 0.7. 0.8 59 59 
AUXILIARY OPERATIONS 
CONV CONVOLUTION (CORRELATION) 0.28% 0:28 106 106 
DEQ22 DIFFERENCE EQUATION, 2 POLES, 2 ZEROS 0.8 0.8 25 25 
VPOLY VECTOR POLYNOMIAL EVALUATION LQ a2 41 4l 
VSUM VECTOR. SUM OF ELEMENTS INTEGRATION 0.7 0.8 13. 13 
VTRAPZ VECTOR TRAPEZOIDAL RULE INTEGRATION 0.7 0.8 16 16 
VSIMPS VECTOR SIMPSONS 1/3 RULE INTEGRATION 0.7 0.8 25. 25 
WIENER WIENER LEVINSON ALGORITHM 0.50* 0.65 100 100 
SIGNAL PROCESSING OPERATIONS. (optional) 
HIST HISTOGRAM | bes. 4 69 69 
HANN HANNING WINDOW MULTIPLY 0.7 0.8 43 43 
ASPEC ACCUMULATING AUTO-SPECTRUM 18>. 735 15 15 
CSPEC ACCUMULATING CROSS-SPECTRUM IF (eT 30 30 
VAVLIN VECTOR LINEAR AVERAGING | be? le 51 = 46 
VAVEXP VECTOR EXPONENTIAL AVERAGING 058°" 1.3%. 52 47 
VDBPWR VECTOR CONVERSION TO DB (POWER) ino 2.3 74 74 
TRANS TRANSFER FUNCTION 3.6 3.6 75 75 
COHER COHERENCE FUNCTION 4.3 4.8 88. 93 
ACORT AUTO-CORRELATION (TIME-DOMAIN) 0.29% 0.29 113 113 
ACORF  AUTO-CORRELATION (FREQUENCY-DOMAIN) 1.80* 2.70 376- 357 
CCORT  CROSS-CORRELATION (TINE-DOMAIN) 0.29% 0.29 113 113 
CCORF  CROSS-CORRELATION (FREQUENCY-DOMAIN)  2.58* 3.93 388 365 
TCONV POSTTAPERED CONVOLUTION (CORRELATION) 0.30* 0.30 113 113 
TABLE MEMORY OPERATIONS (optional) 
MIMOV VECTOR MOVE (MD TO TM) 02. 0:3 7 7 


‘Typical Program 
Execution Size 
Page Name Operation . Time /Loop (AP120B 
(us) PS words) — 
167 [| 333 167 | 333 
D-181 TMMOV VECTOR MOVE (TN TO MD) O22 3053 5 12 
D-182 MTIMOV VECTOR MOVE WITH INCREMENT (MD TO. TM) 0.5 0.5 7 7 
D-183. TMIMOV VECTOR MOVE WITH INCREMENT (TM TO MD) 0.3 0.3 Pe “12 
D=-184 TTIMOV VECTOR MOVE WITH INCREMENT (TM TO TM) 0.5 0.5 Foot 
D-185  MMTADD VECTOR ADD (MD+MD TO TM) O,5e° Os, ae 23 
D-186 MMTSUB VECTOR SUBTRACT (MD-MD TO TM) 025° 304.7 17. 13 
D-187 MNIMUL VECTOR MULTIPLY (MD*MD TO. TM) 0.5 ~Ge7 17 9 
D-188 MIMADD VECTOR ADD (MD+IM TO MD): 0.5 027 17 9 
D-189 MTMSUB VECTOR SUBTRACT (MD-TM TO MD) 0.5 Oe7 17 9 
D-190 TMMSUB VECTOR SUBTRACT .(TM=-MD TO MD) O85. . 0.7 17 9 
D-191 MTMMUL VECTOR MULTIPLY (MD*TM TO MD) 065° 0-7 17 9 
D-192 MTITADD VECTOR ADD (MD+TM TO TM) 025° 025 16 =16 
D-193 MTTSUB VECTOR. SUBTRACT (11.-TM TO TM) O65: 065 18 18 
D-194 TMTSUB VECTOR SUBTRACT (TM-MD -TO TM) ~DeSe 2035 16 16 
D-195 MTTMUL VECTOR MULTIPLY (MD*TIM TO TM) 0.5 0.5 17 17 
D-196 TTMADD VECTOR ADD (TM+IM TO MD) ~ 0.5. 0.5 18 18 
D-197 TIMSUB VECTOR SUBTRACT (TM-TM TO MD) 0.5 0.5 ty? “7 
D-198. TTMMUL VECTOR MULTIPLY (IM*TM TO MD) TOFS: 055 17. 17 
D-199 TITADD VECTOR ADD (TM+TM TO TM) 0.7 Ov7 9 9 
D-200 TTISUB VECTOR SUBTRACT (TM-IM TO TM) O07 057 9 9 
D-201 TITMUL VECTOR MULTIPLY (TM*ITM TO TM) 0.7 °O057 12 12 
-APAL-CALLABLE UTILITY OPERATIONS . 
D-203. DIV SCALAR DIVIDE 3.8 @ 3.8 28 «28. 
D=204 SQRT SCALAR SQUARE ROOT 3.8 @ 3.8 28 8628 
D-205 LOG SCALAR LOGARITHM (BASE 10) 4.7 @4.7 37. «37 
D-206 LN ' SCALAR NATURAL LOGARITHM 4.0 @ 4.0 37.37 
D-207 EXP SCALAR EXPONENTIAL 4.2 @4.2 28 =. 28 
D-208 SIN SCALAR SINE 4.4 @ 4.4 31 31 
D=-209 COS SCALAR COSINE 4.8 @ 4.8 ich est 
D-210 ATAN SCALAR ARCTANGENT ew ae Cae cee, 46 46 
D-211 ATN2 “SCALAR ARCTANGENT OF Y/X . 13.8 @13.8 46 46 
-D=-212 SPFLT FLOAT S-PAD INTEGER 0.8 @0.8 5 5 
D-213 SPMUL S-PAD MULTIPLY 263 °@ 253° 14 14 
- D=214 VFCL1 VECTOR FUNCTION CALLER (1 ARGUMENT) 0.8 1.0 10 10 
 D=215 VFCL2 VECTOR FUNCTION CALLER (2 ARGUMENT) 1.0 1.0 ll 11 
D-216 BITREV COMPLEX VECTOR BIT REVERSE ORDERING 009°. Teh: 45 43 
D=-217 REALTR REAL FFT UNRAVEL AND FINAL PASS 0.4 0.7 51 51 
D-218 FFT2 RADIX 2 FFT FIRST PASS 1.30 267 16 =16 
D=-219: FFT4 RADIX 4 FFT PASS CY are 81 81 
D-220 FFT2B RADIX 2 FFT. FIRST PASS + BIT REVERSE .1.3 2.7. 25 25 
D-221 FFT4B RADIX 4 FFT FIRST PASS + BIT REVERSE 2.7 5.3 44 44 
D-222 STSTAT SET FFT MODE STATUS BITS | 550¢ 5.0 19 319 
D-223 CLSTAT CLEAR FFT MODE STATUS BITS 025--270%5 19 19 
D-224 ILOG2  LOGARITHM (BASE 2) 4.0 @ 4.0 19 19 
D-225 ADV2 0.7 @0.7 8 8 


ADVANCE POINTERS AFTER RADIX 2 FFT 
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D=226 
D=-227 


Notes: 


Name Operation 


ADV4 ADVANCE POINTERS AFTER RADIX 4 FFT 
SET24B SETUP FOR FFT2B AND FFT4B 


#.# Timing host system dependent 


Typical 
Execution 
Time/Loop 

(us), 


Program 

Size 

(AP120B 
PS words) 


167 | 333 
8 8 
8 8 


* Refer to description of routine for explanation of timing 


@ Total execution time 
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k cS ae * 
* VADD * ---- VECTOR ADD ---- . . * VADD * 
* es x x 


KEEEKKKEKK KRREEKKKEAKEK 


PURPOSE: To add the elements of two-vectors. 


FORTRAN CALL: CALL VADD(A,I.B J,C,K,N) 


PARAMETERS : A = Source vector base address 
I = A address increment 
B = Source vector base address 
J = B address increment 
C = Destination vector base address 
K = C address increment 
N = Element count 
FORMULA: | C(mK) = A(mI) + B(mJ) for m=0 to N-1 


DESCRIPTION: Adds N elements of vector beginning at address 
A to N elements of vector beginning at address B, 
and stores results in vector beginning at 
address C. 


EXAMPLE: CALL VADD(0,1,200,1,400,1,100) 

: - Stores into AP120B main data memory locations 
400,401,....,498,499 the sum of the numbers 
in locations 0 and 200, 1 and 201, .... ,: 

98 and 298, 99 and 299. 


EXECUTION BEST TYPICAL WORST SETUP (us) 
TIME/LOOP: 0.5 (B) 0.8 1.0 Dey (167 ns memory) 
(us) 1.0 (A) 1.3 je . 1.2 (333 ns memory) 
PROGRAM SIZE: 17 (167 ns memory) 
(AP words) 10 é (333 ns memory) 

APAL CALL: JSR VADD 
SCRATCH: SP(0,2,4,14,15) ,DPX(0,1),DPY(0), (167 ns memory) 
FA,MD,™ 

‘SP(0,2,4,6),DPX(0),FA,MD (333 ns memory) 
EXTERNALS: SPFLT | (167 ns memory) 
~  . None . . (333 ns memory) 
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* CVMAGS * ---- COMPLEX VECTOR MAGNITUDE SQUARED ---- * CVMAGS * 
#e 


k x ‘ 
KRAKKKKKAKE KKKKKKKKKK 
PURPOSE: To compute the squared magnitude of 


the elements of a complex vector. 
FORTRAN CALL: CALL CVMAGS(A,1,C,K,N) 


‘Source vector base address 


' PARAMETERS: A = 
I = A address increment 
C = Destination vector base address 
K = C address increment 
N = Complex element count 
FORMULA: C(mK) = A(mI)**2 + A(mI+1)**2 for m=0 to N-1 


DESCRIPTION: For each of the N complex elements 
. of the complex vector beginning at address A, 
the square of the real part is added to the 
square of the imaginary part, and the result 
is stored into the real vector beginning at 
address C. | | 


EXAMPLE: CALL CVMAGS (0, 2,200, 1,50) 

| Stores into AP120B main data memory 
locations 200,201,....,248,249 

the sum of the squares of the numbers in 
locations O and 1, 2 and 3, ..e- , 

96 and 97, 98 and 99. . | 


EXECUTION BEST TYPICAL WORST SETUP (us ) 

TIME/LOOP: ° £0O.7 0.7 0.8 7 (167 ns memory) 
(us) © 132 Lyd ne 2.0 (333 ns memory) 
PROGRAM SIZE: 13 (167 ns memory) 
(AP words) 18 a ' (333 ns memory) 
APAL CALL: © JSR CVMAGS 

SCRATCH: SP(0,2,4),DPX(0-1) ,DPY(0),FA.FM,ID 

EXTERNALS: None 


